inherited fUrnas: TfUrnas
  Left = 517
  Top = 150
  Width = 631
  Height = 485
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label3: TLabel [0]
    Left = 24
    Top = 49
    Width = 33
    Height = 13
    Caption = 'C'#243'digo'
  end
  object Label4: TLabel [1]
    Left = 74
    Top = 49
    Width = 48
    Height = 13
    Caption = 'Descri'#231#227'o'
  end
  object Label5: TLabel [2]
    Left = 488
    Top = 86
    Width = 53
    Height = 13
    Caption = 'Data ultima'
  end
  object Label6: TLabel [3]
    Left = 25
    Top = 90
    Width = 30
    Height = 13
    Caption = 'Marca'
  end
  object Label7: TLabel [4]
    Left = 204
    Top = 89
    Width = 29
    Height = 13
    Caption = 'Grupo'
  end
  object Label8: TLabel [5]
    Left = 24
    Top = 130
    Width = 39
    Height = 13
    Caption = 'Estoque'
  end
  object Label9: TLabel [6]
    Left = 124
    Top = 130
    Width = 64
    Height = 13
    Caption = 'P. Reposi'#231#227'o'
  end
  object Label10: TLabel [7]
    Left = 331
    Top = 130
    Width = 88
    Height = 13
    Caption = 'Valor Compra Real'
  end
  object Label11: TLabel [8]
    Left = 435
    Top = 130
    Width = 38
    Height = 13
    Caption = '% Lucro'
  end
  object Label12: TLabel [9]
    Left = 491
    Top = 130
    Width = 73
    Height = 13
    Caption = 'Valor de Venda'
  end
  object Label13: TLabel [10]
    Left = 228
    Top = 130
    Width = 63
    Height = 13
    Caption = 'Valor Compra'
  end
  object RxLabel1: TRxLabel [11]
    Left = 29
    Top = 182
    Width = 59
    Height = 13
    Caption = 'Localizar =>'
  end
  inherited Panel1: TPanel
    Top = 404
    Width = 615
  end
  object Panel3: TPanel [13]
    Left = 0
    Top = 0
    Width = 615
    Height = 40
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvNone
    Color = 11189162
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 1
    object Label2: TLabel
      Left = 220
      Top = 8
      Width = 202
      Height = 24
      Caption = 'Cadastro de Produtos'
    end
    object Label1: TLabel
      Left = 222
      Top = 8
      Width = 202
      Height = 24
      Caption = 'Cadastro de Produtos'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
  end
  object DBEdit1: TDBEdit [14]
    Left = 24
    Top = 65
    Width = 49
    Height = 21
    TabStop = False
    BevelInner = bvNone
    BevelOuter = bvNone
    BevelKind = bkFlat
    BorderStyle = bsNone
    Color = clInfoBk
    DataField = 'ID_PRODUTO'
    DataSource = DtSrc
    ReadOnly = True
    TabOrder = 2
  end
  object DBEdit2: TDBEdit [15]
    Left = 74
    Top = 65
    Width = 511
    Height = 21
    BevelKind = bkFlat
    BorderStyle = bsNone
    CharCase = ecUpperCase
    DataField = 'DESCRICAO'
    DataSource = DtSrc
    TabOrder = 3
    OnKeyPress = FormKeyPress
  end
  object DBEdit3: TDBEdit [16]
    Left = 488
    Top = 102
    Width = 97
    Height = 21
    BevelKind = bkFlat
    BorderStyle = bsNone
    DataField = 'D_COMPRA'
    DataSource = DtSrc
    TabOrder = 8
    OnKeyPress = FormKeyPress
  end
  object DBLookupComboBox1: TDBLookupComboBox [17]
    Left = 24
    Top = 105
    Width = 145
    Height = 21
    BevelInner = bvNone
    BevelOuter = bvNone
    BevelKind = bkFlat
    DataField = 'ID_MARCA'
    DataSource = DtSrc
    KeyField = 'ID_MARCA'
    ListField = 'DESCRICAO'
    ListSource = dtsrc_marca
    TabOrder = 4
    OnKeyPress = FormKeyPress
  end
  object BitBtn1: TBitBtn [18]
    Left = 169
    Top = 101
    Width = 34
    Height = 25
    TabOrder = 5
    OnClick = BitBtn1Click
    OnKeyPress = FormKeyPress
    Glyph.Data = {
      C2070000424DC20700000000000036000000280000001E000000150000000100
      1800000000008C070000120B0000120B00000000000000000000BFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0070A01F70A01F80AF0070
      A0BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBF108FBF2F8FB00F0F0F0000001F4F600F7FB0
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBF0070A020AFDF3FCFFF50909FF0C090806F500000002F607FBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0F70AF
      108FC03FCFFF3FCFFF50909FFFCF9FFFCF9F4F4030101F1F2F80B0BFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00609F1F9FCF3FCFFF1F9FCF3F
      CFFF4FCFFF50A0BFF0C090FFCF9FAF8F6F0000005F90B0BFBFBFBFBFBF005080
      2F80B000609FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBF0F7FB02FBFEF3FCFFF3FCFFF2090C070DFFF90E0
      FFAFE0FFAF9F80FFCF9FCFA080000000508FAF00609F409FC0609FB01F1F1F1F
      30400F70A0BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBF108FC03FCFFF40CFFF5FD0FF7FDFFF409FC0AFE0FFD0F0FFE0F0FF
      EFEFF0A09080806F50304F5F308FBF80D0F07FDFFF5F8F9F9F8060000000102F
      3F00609FBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBF0070A01080
      BF4FD0FF6FD0FF8FDFFFA0E0FFC0EFFFBFE0F05F9FC0F0FFFFF0FFFFDFF0FFBF
      E0FF5FAFCF0F90C050C0EF50D0FF3FCFFF50909FFFCF9F6F5F400000000F5F80
      BFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF0F7FAF30AFDF4FAFDF90E0FF
      AFEFFFCFEFFFDFF0FFEFFFFFF0FFFF2F9FC02F9FC060BFDF409FC00F8FB00070
      A000AFD030BFEF3FCFFF3FCFFF309FBFF0C090CFA0800000001F709FBFBFBFBF
      BFBFBFBFBFBFBFBF0000BFBFBFBFBFBF00609F90DFFF3F8FBFD0F0FFE0F0FFF0
      FFFFF0FFFFE0F0FFCFF0FF90D0EF1F9FCF00A0CF0090C000AFD00080B000AFD0
      20BFEF3FCFFF3FCFFF3FCFFF809080CFA0800000001F6F90BFBFBFBFBFBFBFBF
      BFBFBFBF0000BFBFBFBFBFBF00609FD0F0FF80BFD07FB0CFF0FFFFDFF0FFC0EF
      FFAFE0FF8FDFFF70DFFF50D0FF1FA0D00070AF0090C0007FAF00A0CF0F9FCF3F
      CFFF3FCFFF3FCFFF3FC0F050808000304F0070A0BFBFBFBFBFBFBFBFBFBFBFBF
      0000BFBFBFBFBFBF00609F8FBFD0D0E0F02F80AF207FAF60B0DF60BFDF60D0FF
      4FCFFF3FCFFF3FCFFF3FCFFF30C0FF1F9FD00090BF00A0CF00A0CF10A0D030C0
      FF1FAFDF1090C00070AF005080BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBF
      BFBFBFBFBFBFBF00609F00609FBFBFBFBFBFBF0F70A020A0D020A0DF20A0DF30
      C0FF3FCFFF3FCFFF3FCFFF3FCFFF30C0FF20A0DF006F9F0070A0005080BFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0F7FAF20AFDF108FC01F9F
      CF109FD01090C0007FB0006F9F005080BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0070A0007FAF00609FBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBF0000}
  end
  object DBLookupComboBox2: TDBLookupComboBox [19]
    Left = 204
    Top = 104
    Width = 247
    Height = 21
    BevelInner = bvNone
    BevelOuter = bvNone
    BevelKind = bkFlat
    DataField = 'ID_FAMILIA'
    DataSource = DtSrc
    KeyField = 'ID_FAMILIA'
    ListField = 'DESCRICAO'
    ListSource = dtsrc_grupo
    TabOrder = 6
    OnKeyPress = FormKeyPress
  end
  object BitBtn2: TBitBtn [20]
    Left = 452
    Top = 100
    Width = 34
    Height = 25
    TabOrder = 7
    OnClick = BitBtn2Click
    OnKeyPress = FormKeyPress
    Glyph.Data = {
      C2070000424DC20700000000000036000000280000001E000000150000000100
      1800000000008C070000120B0000120B00000000000000000000BFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0070A01F70A01F80AF0070
      A0BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBF108FBF2F8FB00F0F0F0000001F4F600F7FB0
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBF0070A020AFDF3FCFFF50909FF0C090806F500000002F607FBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0F70AF
      108FC03FCFFF3FCFFF50909FFFCF9FFFCF9F4F4030101F1F2F80B0BFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00609F1F9FCF3FCFFF1F9FCF3F
      CFFF4FCFFF50A0BFF0C090FFCF9FAF8F6F0000005F90B0BFBFBFBFBFBF005080
      2F80B000609FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBF0F7FB02FBFEF3FCFFF3FCFFF2090C070DFFF90E0
      FFAFE0FFAF9F80FFCF9FCFA080000000508FAF00609F409FC0609FB01F1F1F1F
      30400F70A0BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBF108FC03FCFFF40CFFF5FD0FF7FDFFF409FC0AFE0FFD0F0FFE0F0FF
      EFEFF0A09080806F50304F5F308FBF80D0F07FDFFF5F8F9F9F8060000000102F
      3F00609FBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBF0070A01080
      BF4FD0FF6FD0FF8FDFFFA0E0FFC0EFFFBFE0F05F9FC0F0FFFFF0FFFFDFF0FFBF
      E0FF5FAFCF0F90C050C0EF50D0FF3FCFFF50909FFFCF9F6F5F400000000F5F80
      BFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF0F7FAF30AFDF4FAFDF90E0FF
      AFEFFFCFEFFFDFF0FFEFFFFFF0FFFF2F9FC02F9FC060BFDF409FC00F8FB00070
      A000AFD030BFEF3FCFFF3FCFFF309FBFF0C090CFA0800000001F709FBFBFBFBF
      BFBFBFBFBFBFBFBF0000BFBFBFBFBFBF00609F90DFFF3F8FBFD0F0FFE0F0FFF0
      FFFFF0FFFFE0F0FFCFF0FF90D0EF1F9FCF00A0CF0090C000AFD00080B000AFD0
      20BFEF3FCFFF3FCFFF3FCFFF809080CFA0800000001F6F90BFBFBFBFBFBFBFBF
      BFBFBFBF0000BFBFBFBFBFBF00609FD0F0FF80BFD07FB0CFF0FFFFDFF0FFC0EF
      FFAFE0FF8FDFFF70DFFF50D0FF1FA0D00070AF0090C0007FAF00A0CF0F9FCF3F
      CFFF3FCFFF3FCFFF3FC0F050808000304F0070A0BFBFBFBFBFBFBFBFBFBFBFBF
      0000BFBFBFBFBFBF00609F8FBFD0D0E0F02F80AF207FAF60B0DF60BFDF60D0FF
      4FCFFF3FCFFF3FCFFF3FCFFF30C0FF1F9FD00090BF00A0CF00A0CF10A0D030C0
      FF1FAFDF1090C00070AF005080BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBF
      BFBFBFBFBFBFBF00609F00609FBFBFBFBFBFBF0F70A020A0D020A0DF20A0DF30
      C0FF3FCFFF3FCFFF3FCFFF3FCFFF30C0FF20A0DF006F9F0070A0005080BFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0F7FAF20AFDF108FC01F9F
      CF109FD01090C0007FB0006F9F005080BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0070A0007FAF00609FBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBF0000}
  end
  object DBEdit4: TDBEdit [21]
    Left = 24
    Top = 146
    Width = 97
    Height = 21
    BevelKind = bkFlat
    BorderStyle = bsNone
    DataField = 'ESTOQUE'
    DataSource = DtSrc
    TabOrder = 9
    OnKeyPress = FormKeyPress
  end
  object DBEdit5: TDBEdit [22]
    Left = 124
    Top = 146
    Width = 97
    Height = 21
    BevelKind = bkFlat
    BorderStyle = bsNone
    DataField = 'REPOSICAO'
    DataSource = DtSrc
    TabOrder = 10
    OnKeyPress = FormKeyPress
  end
  object DBEdit6: TDBEdit [23]
    Left = 331
    Top = 146
    Width = 97
    Height = 21
    BevelKind = bkFlat
    BorderStyle = bsNone
    DataField = 'VC_REAL'
    DataSource = DtSrc
    TabOrder = 12
    OnKeyPress = DBEdit9KeyPress
  end
  object DBEdit7: TDBEdit [24]
    Left = 435
    Top = 146
    Width = 50
    Height = 21
    BevelKind = bkFlat
    BorderStyle = bsNone
    DataField = 'M_LUCRO'
    DataSource = DtSrc
    TabOrder = 13
    OnExit = DBEdit7Exit
    OnKeyPress = FormKeyPress
  end
  object DBEdit8: TDBEdit [25]
    Left = 491
    Top = 146
    Width = 97
    Height = 21
    BevelKind = bkFlat
    BorderStyle = bsNone
    DataField = 'V_VENDA'
    DataSource = DtSrc
    TabOrder = 14
    OnKeyPress = DBEdit9KeyPress
  end
  object DBEdit9: TDBEdit [26]
    Left = 228
    Top = 146
    Width = 97
    Height = 21
    BevelKind = bkFlat
    BorderStyle = bsNone
    DataField = 'V_COMPRA'
    DataSource = DtSrc
    TabOrder = 11
    OnKeyPress = DBEdit9KeyPress
  end
  object DBGrid1: TDBGrid [27]
    Left = 24
    Top = 199
    Width = 561
    Height = 185
    DataSource = DtSrc
    TabOrder = 15
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDrawColumnCell = DBGrid1DrawColumnCell
    OnTitleClick = DBGrid1TitleClick
    Columns = <
      item
        Expanded = False
        FieldName = 'ID_PRODUTO'
        Title.Caption = 'C'#243'digo'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DESCRICAO'
        Title.Caption = 'Produto'
        Width = 400
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ESTOQUE'
        Title.Caption = 'Estoque'
        Visible = True
      end>
  end
  object EvDBFind1: TEvDBFind [28]
    Left = 104
    Top = 176
    Width = 481
    Height = 21
    Color = clInfoBk
    DataField = 'DESCRICAO'
    DataSource = DtSrc
    TabOrder = 16
  end
  inherited PopupMenu1: TPopupMenu
    OwnerDraw = True
    Top = 41
  end
  inherited DtSrc: TDataSource
    DataSet = cds_prod
    Top = 42
  end
  object dsp_prod: TDataSetProvider
    DataSet = sds_prod
    UpdateMode = upWhereKeyOnly
    Left = 504
    Top = 8
  end
  object cds_prod: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dsp_prod'
    Left = 536
    Top = 8
    object cds_prodID_PRODUTO: TIntegerField
      FieldName = 'ID_PRODUTO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object cds_prodDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      ProviderFlags = [pfInUpdate]
      Size = 100
    end
    object cds_prodID_FAMILIA: TIntegerField
      FieldName = 'ID_FAMILIA'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodID_MARCA: TIntegerField
      FieldName = 'ID_MARCA'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodD_COMPRA: TDateField
      FieldName = 'D_COMPRA'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodV_COMPRA: TFloatField
      FieldName = 'V_COMPRA'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodV_VENDA: TFloatField
      FieldName = 'V_VENDA'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodVC_REAL: TFloatField
      FieldName = 'VC_REAL'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodM_LUCRO: TFloatField
      FieldName = 'M_LUCRO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodESTOQUE: TIntegerField
      FieldName = 'ESTOQUE'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodREPOSICAO: TIntegerField
      FieldName = 'REPOSICAO'
      ProviderFlags = [pfInUpdate]
    end
  end
  object sds_prod: TSQLDataSet
    CommandText = 'select * from PRODUTOS'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = DM.SQLObitos
    Left = 472
    Top = 8
    object sds_prodID_PRODUTO: TIntegerField
      FieldName = 'ID_PRODUTO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object sds_prodDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      ProviderFlags = [pfInUpdate]
      Size = 100
    end
    object sds_prodID_FAMILIA: TIntegerField
      FieldName = 'ID_FAMILIA'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodID_MARCA: TIntegerField
      FieldName = 'ID_MARCA'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodD_COMPRA: TDateField
      FieldName = 'D_COMPRA'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodV_COMPRA: TFloatField
      FieldName = 'V_COMPRA'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodV_VENDA: TFloatField
      FieldName = 'V_VENDA'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodVC_REAL: TFloatField
      FieldName = 'VC_REAL'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodM_LUCRO: TFloatField
      FieldName = 'M_LUCRO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodESTOQUE: TIntegerField
      FieldName = 'ESTOQUE'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodREPOSICAO: TIntegerField
      FieldName = 'REPOSICAO'
      ProviderFlags = [pfInUpdate]
    end
  end
  object XPMenu1: TXPMenu
    DimLevel = 30
    GrayLevel = 10
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clMenuText
    Font.Height = -13
    Font.Name = 'Calibri'
    Font.Style = []
    Color = clBtnFace
    DrawMenuBar = False
    IconBackColor = clBtnFace
    MenuBarColor = clBtnFace
    SelectColor = clHighlight
    SelectBorderColor = clHighlight
    SelectFontColor = clMenuText
    DisabledColor = clInactiveCaption
    SeparatorColor = clBtnFace
    CheckedColor = clHighlight
    IconWidth = 24
    DrawSelect = True
    UseSystemColors = True
    UseDimColor = False
    OverrideOwnerDraw = False
    Gradient = False
    FlatMenu = False
    AutoDetect = True
    Active = True
    Left = 440
    Top = 8
  end
  object dtsrc_marca: TDataSource
    DataSet = cds_marca
    Left = 120
    Top = 8
  end
  object cds_marca: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dsp_marca'
    Left = 88
    Top = 8
    object cds_marcaID_MARCA: TIntegerField
      FieldName = 'ID_MARCA'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object cds_marcaDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      ProviderFlags = [pfInUpdate]
      Size = 80
    end
  end
  object dsp_marca: TDataSetProvider
    DataSet = sds_marca
    UpdateMode = upWhereKeyOnly
    Left = 56
    Top = 8
  end
  object sds_marca: TSQLDataSet
    CommandText = 'select * from MARCA '#13#10
    MaxBlobSize = -1
    Params = <>
    SQLConnection = DM.SQLObitos
    Left = 24
    Top = 8
    object sds_marcaID_MARCA: TIntegerField
      FieldName = 'ID_MARCA'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object sds_marcaDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      ProviderFlags = [pfInUpdate]
      Size = 80
    end
  end
  object dtsrc_grupo: TDataSource
    DataSet = cds_grupo
    Left = 248
    Top = 8
  end
  object cds_grupo: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dsp_grupo'
    Left = 216
    Top = 8
    object cds_grupoID_FAMILIA: TIntegerField
      FieldName = 'ID_FAMILIA'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object cds_grupoDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      ProviderFlags = [pfInUpdate]
      Size = 80
    end
  end
  object dsp_grupo: TDataSetProvider
    DataSet = sds_grupo
    UpdateMode = upWhereKeyOnly
    Left = 184
    Top = 8
  end
  object sds_grupo: TSQLDataSet
    CommandText = 'select * from  FAMILIA '#13#10
    MaxBlobSize = -1
    Params = <>
    SQLConnection = DM.SQLObitos
    Left = 152
    Top = 8
    object sds_grupoID_FAMILIA: TIntegerField
      FieldName = 'ID_FAMILIA'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object sds_grupoDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      ProviderFlags = [pfInUpdate]
      Size = 80
    end
  end
end
